创建多行文字 |
您所在的位置:网站首页 › VBA 多行文字 转单行文字 › 创建多行文字 |
previous page
next page
使用多行文字
使用多行文字
格式化多行文字
ActiveX/VBA 开发人员手册 > 创建和编辑 AutoCAD 图元 > 将文字添加到图形 > 使用多行文字 >
创建多行文字
可以使用 AddMText 方法来创建多行文字对象(MText 对象)。此方法需要输入三个值:文字字符串、图形中用于放置文字的插入点和文字边框的宽度。 字符串是要显示的实际文字,可以是 Unicode、控制代码和特殊字符。插入点是包含三个双精度数的变量数组,这三个数代表图形中放置文字处的三维 WCS 坐标。文字宽度是代表文字边框宽度的正数,宽度是以当前单位测量的。 创建 MText 对象之后,用户可以将文字高度、对正、旋转角度和样式应用到 MText 对象,或将字符格式应用到选定字符。 有关应用于 MText 对象的方法和特性的列表,请参见《ActiveX and VBA Reference》中 MText 的相关条目。 创建多行文字的步骤 以下代码在模型空间中的 (2,2,0) 坐标处创建 MText 对象。 Sub Ch4_CreateMText() Dim mtextObj As AcadMText Dim insertPoint(0 To 2) As Double Dim width As Double Dim textString As String insertPoint(0) = 2 insertPoint(1) = 2 insertPoint(2) = 0 width = 4 textString = "This is a text string for the mtext object." ' 在模型空间中创建文字对象 Set mtextObj = ThisDrawing.ModelSpace. _ AddMText(insertPoint, width, textString) ZoomAll End Sub 请将关于此页的评论发送给我们 |
今日新闻 |
推荐新闻 |
CopyRight 2018-2019 办公设备维修网 版权所有 豫ICP备15022753号-3 |